#!/usr/bin/perl
#d to h
for ($i = 0; $i < @ARGV; $i++){
    printf("%d\t= 0x%x\n", $ARGV[$i],$ARGV[$i]);
}

